home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 001 / versa11.arc / VERSA2.MNU < prev    next >
Encoding:
Text File  |  1987-05-23  |  13.4 KB  |  512 lines
  1. SELECT:
  2. SWIT S1
  3. CASE"212"
  4. GOTO NEW_YORK
  5. ENDC
  6. CASE"215"
  7. GOTO PHILLY
  8. ENDC
  9. CASE"919"
  10. GOTO R_T_PARK
  11. ENDC
  12. CASE"813"
  13. GOTO TAMPA
  14. ENDC
  15. CASE"202"
  16. GOTO WASH_DC
  17. ENDC
  18. CASE"312"
  19. GOTO CHICAGO
  20. ENDC
  21. DEFA
  22. ASSI S9"ERROR"
  23. EXEC"VERSA.CMD"
  24. ENDC
  25. ENDS
  26. NEW_YORK:
  27. CLEA
  28. LOCA 2,0
  29. MESS"               ╒════════╡ New York BBS Directory (212) ╞════════╕"
  30. MESS"               │                                                │"
  31. MESS"               │       -Board-                      -SIG-       │"
  32. MESS"               │                                                │"
  33. MESS"               │  < 1> Invention Factory            Everything  │"
  34. MESS"               │  < 2> Friends                    Conversation  │"
  35. MESS"               │  < 3> PC Magazine IRS        PC Mag Utilities  │"
  36. MESS"               │  < 4> Wolves' Den                    PC Board  │"
  37. MESS"               │  < 5> NY BBS Service                           │"
  38. MESS"               │  < 6> Net Works                                │"
  39. MESS"               │  < 7> Marble Hill                              │"
  40. MESS"               │  < 8> NY Connection                            │"
  41. MESS"               │  < 9> Chelsea Square                           │"
  42. MESS"               │  <10>                                          │"
  43. MESS"               │                                                │"
  44. MESS"               │          <G>o back to city selection           │"
  45. MESS"               │                                                │"
  46. MESS"               ├────────────────────────────────────────────────┤"
  47. MESS"               │  Enter 1-10 or other BBS phone number:         │"
  48. MESS"               ╘════════════════════════════════════════════════╛"
  49. LOCA 20,56
  50. GET S9 7
  51. SWIT S9
  52. CASE"1"
  53. ASSI S2"4311194"
  54. ;ASSI S7"COMMAND.VER"
  55. ENDC
  56. CASE"2"
  57. ASSI S2"7814723"
  58. ;ASSI S7"COMMAND.VER"
  59. ENDC
  60. CASE"3"
  61. ASSI S2"6960360"
  62. ;ASSI S7"COMMAND.VER"
  63. ENDC
  64. CASE"4"
  65. ASSI S2"8746319"
  66. ;ASSI S7"COMMAND.VER"
  67. ENDC
  68. CASE"5"
  69. ASSI S2"9800770"
  70. ;ASSI S7"COMMAND.VER"
  71. ENDC
  72. CASE"6"
  73. ASSI S2"4100949"
  74. ;ASSI S7"COMMAND.VER"
  75. ENDC
  76. CASE"7"
  77. ASSI S2"5625308"
  78. ;ASSI S7"COMMAND.VER"
  79. ENDC
  80. CASE"8"
  81. ASSI S2"6285495"
  82. ;ASSI S7"COMMAND.VER"
  83. ENDC
  84. CASE"9"
  85. ASSI S2"8071267"
  86. ;ASSI S7"COMMAND.VER"
  87. ENDC
  88. CASE"10"
  89. ASSI S2"XXXXXXX"
  90. ;ASSI S7"COMMAND.VER"
  91. ENDC
  92. CASE"D"
  93. EXEC"VERSA.CMD"
  94. ENDC
  95. CASE"E"
  96. EXEC"VERSA.CMD"
  97. ENDC
  98. CASE"G"
  99. EXEC"VERSA.CMD"
  100. ENDC
  101. DEFA
  102. ASSI S2 S9
  103. ENDC
  104. ENDS
  105. ASSI S9"ACTIVE"
  106. EXEC"VERSA.CMD"
  107. PHILLY:
  108. CLEA
  109. LOCA 2,0
  110. MESS"               ╒══════╡ Philadelphia BBS Directory (215) ╞══════╕"
  111. MESS"               │                                                │"
  112. MESS"               │       -Board-                      -SIG-       │"
  113. MESS"               │                                                │"
  114. MESS"               │  < 1> Softshop                                 │"
  115. MESS"               │  < 2> Homer Systems                            │"
  116. MESS"               │  < 3> System2                                  │"
  117. MESS"               │  < 4> Garden Works                             │"
  118. MESS"               │  < 5> Micro BBS                                │"
  119. MESS"               │  < 6> DATANET                                  │"
  120. MESS"               │  < 7> Matrix                                   │"
  121. MESS"               │  < 8> CITADEL BBS                              │"
  122. MESS"               │  < 9> Compu Chuck                              │"
  123. MESS"               │  <10>                                          │"
  124. MESS"               │                                                │"
  125. MESS"               │          <G>o back to city selection           │"
  126. MESS"               │                                                │"
  127. MESS"               ├────────────────────────────────────────────────┤"
  128. MESS"               │  Enter 1-10 or other BBS phone number:         │"
  129. MESS"               ╘════════════════════════════════════════════════╛"
  130. LOCA 20,56
  131. GET S9 7
  132. SWIT S9
  133. CASE"1"
  134. ASSI S2"6631487"
  135. ;ASSI S7"COMMAND.VER"
  136. ENDC
  137. CASE"2"
  138. ASSI S2"5247027"
  139. ;ASSI S7"COMMAND.VER"
  140. ENDC
  141. CASE"3"
  142. ASSI S2"5841412"
  143. ;ASSI S7"COMMAND.VER"
  144. ENDC
  145. CASE"4"
  146. ASSI S2"2765177"
  147. ;ASSI S7"COMMAND.VER"
  148. ENDC
  149. CASE"5"
  150. ASSI S2"3386005"
  151. ;ASSI S7"COMMAND.VER"
  152. ENDC
  153. CASE"6"
  154. ASSI S2"5639211"
  155. ;ASSI S7"COMMAND.VER"
  156. ENDC
  157. CASE"7"
  158. ASSI S2"6323986"
  159. ;ASSI S7"COMMAND.VER"
  160. ENDC
  161. CASE"8"
  162. ASSI S2"6381176"
  163. ;ASSI S7"COMMAND.VER"
  164. ENDC
  165. CASE"9"
  166. ASSI S2"6711256"
  167. ;ASSI S7"COMMAND.VER"
  168. ENDC
  169. CASE"10"
  170. ASSI S2"XXXXXXX"
  171. ;ASSI S7"COMMAND.VER"
  172. ENDC
  173. CASE"D"
  174. EXEC"VERSA.CMD"
  175. ENDC
  176. CASE"E"
  177. EXEC"VERSA.CMD"
  178. ENDC
  179. CASE"G"
  180. EXEC"VERSA.CMD"
  181. ENDC
  182. DEFA
  183. ASSI S2 S9
  184. ENDC
  185. ENDS
  186. ASSI S9"ACTIVE"
  187. EXEC"VERSA.CMD"
  188. R_T_PARK:
  189. CLEA
  190. LOCA 2,0
  191. MESS"               ╒═╡ Research Triangle Park BBS Directory (919) ╞═╕"
  192. MESS"               │                                                │"
  193. MESS"               │       -Board-                      -SIG-       │"
  194. MESS"               │                                                │"
  195. MESS"               │  < 1> Mists of Avalon                          │"
  196. MESS"               │  < 2> The Third Wave                           │"
  197. MESS"               │  < 3> The Second Ring                          │"
  198. MESS"               │  < 4> The Extra Ball                           │"
  199. MESS"               │  < 5> The Clone Connection                     │"
  200. MESS"               │  < 6> GTS RBBS                                 │"
  201. MESS"               │  < 7> The Starfleet RBBS                       │"
  202. MESS"               │  < 8> Nibbles & Bytes                          │"
  203. MESS"               │  < 9> The TeXnet BBS                           │"
  204. MESS"               │  <10>                                          │"
  205. MESS"               │                                                │"
  206. MESS"               │          <G>o back to city selection           │"
  207. MESS"               │                                                │"
  208. MESS"               ├────────────────────────────────────────────────┤"
  209. MESS"               │  Enter 1-10 or other BBS phone number:         │"
  210. MESS"               ╘════════════════════════════════════════════════╛"
  211. LOCA 20,56
  212. GET S9 7
  213. SWIT S9
  214. CASE"1"
  215. ASSI S2"7566151"
  216. ;ASSI S7"COMMAND.VER"
  217. ENDC
  218. CASE"2"
  219. ASSI S2"7909470"
  220. ;ASSI S7"COMMAND.VER"
  221. ENDC
  222. CASE"3"
  223. ASSI S2"8474625"
  224. ;ASSI S7"COMMAND.VER"
  225. ENDC
  226. CASE"4"
  227. ASSI S2"8515563"
  228. ;ASSI S7"COMMAND.VER"
  229. ENDC
  230. CASE"5"
  231. ASSI S2"4719771"
  232. ;ASSI S7"COMMAND.VER"
  233. ENDC
  234. CASE"6"
  235. ASSI S2"4790043"
  236. ;ASSI S7"COMMAND.VER"
  237. ENDC
  238. CASE"7"
  239. ASSI S2"7823095"
  240. ;ASSI S7"COMMAND.VER"
  241. ENDC
  242. CASE"8"
  243. ASSI S2"9429267"
  244. ;ASSI S7"COMMAND.VER"
  245. ENDC
  246. CASE"9"
  247. ASSI S2"9680657"
  248. ;ASSI S7"COMMAND.VER"
  249. ENDC
  250. CASE"10"
  251. ASSI S2"XXXXXXX"
  252. ;ASSI S7"COMMAND.VER"
  253. ENDC
  254. CASE"D"
  255. EXEC"VERSA.CMD"
  256. ENDC
  257. CASE"E"
  258. EXEC"VERSA.CMD"
  259. ENDC
  260. CASE"G"
  261. EXEC"VERSA.CMD"
  262. ENDC
  263. DEFA
  264. ASSI S2 S9
  265. ENDC
  266. ENDS
  267. ASSI S9"ACTIVE"
  268. EXEC"VERSA.CMD"
  269. TAMPA:
  270. CLEA
  271. LOCA 2,0
  272. MESS"               ╒═════════╡ Tampa BBS Directory  (813) ╞═════════╕"
  273. MESS"               │                                                │"
  274. MESS"               │       -Board-                      -SIG-       │"
  275. MESS"               │                                                │"
  276. MESS"               │  < 1> Sands of Babylon                         │"
  277. MESS"               │  < 2> The Swamp                                │"
  278. MESS"               │  < 3> BIDS RBBS                                │"
  279. MESS"               │  < 4> Amateur Radio                            │"
  280. MESS"               │  < 5> Ark Tangent Comp Sci                     │"
  281. MESS"               │  < 6> CAD Connx                                │"
  282. MESS"               │  < 7> Shamrock BBS                             │"
  283. MESS"               │  < 8>                                          │"
  284. MESS"               │  < 9>                                          │"
  285. MESS"               │  <10>                                          │"
  286. MESS"               │                                                │"
  287. MESS"               │          <G>o back to city selection           │"
  288. MESS"               │                                                │"
  289. MESS"               ├────────────────────────────────────────────────┤"
  290. MESS"               │  Enter 1-10 or other BBS phone number:         │"
  291. MESS"               ╘════════════════════════════════════════════════╛"
  292. LOCA 20,56
  293. GET S9 7
  294. SWIT S9
  295. CASE"1"
  296. ASSI S2"2547710"
  297. ;ASSI S7"COMMAND.VER"
  298. ENDC
  299. CASE"2"
  300. ASSI S2"8316841"
  301. ;ASSI S7"COMMAND.VER"
  302. ENDC
  303. CASE"3"
  304. ASSI S2"8393003"
  305. ;ASSI S7"COMMAND.VER"
  306. ENDC
  307. CASE"4"
  308. ASSI S2"8856524"
  309. ;ASSI S7"COMMAND.VER"
  310. ENDC
  311. CASE"5"
  312. ASSI S2"9326939"
  313. ;ASSI S7"COMMAND.VER"
  314. ENDC
  315. CASE"6"
  316. ASSI S2"8820494"
  317. ;ASSI S7"COMMAND.VER"
  318. ENDC
  319. CASE"7"
  320. ASSI S2"6812611"
  321. ;ASSI S7"COMMAND.VER"
  322. ENDC
  323. CASE"8"
  324. ASSI S2"XXXXXXX"
  325. ;ASSI S7"COMMAND.VER"
  326. ENDC
  327. CASE"9"
  328. ASSI S2"XXXXXXX"
  329. ;ASSI S7"COMMAND.VER"
  330. ENDC
  331. CASE"10"
  332. ASSI S2"XXXXXXX"
  333. ;ASSI S7"COMMAND.VER"
  334. ENDC
  335. CASE"D"
  336. EXEC"VERSA.CMD"
  337. ENDC
  338. CASE"E"
  339. EXEC"VERSA.CMD"
  340. ENDC
  341. CASE"G"
  342. EXEC"VERSA.CMD"
  343. ENDC
  344. DEFA
  345. ASSI S2 S9
  346. ENDC
  347. ENDS
  348. ASSI S9"ACTIVE"
  349. EXEC"VERSA.CMD"
  350. WASH_DC:
  351. CLEA
  352. LOCA 2,0
  353. MESS"               ╒═╡ Washington DC BBS Directory  (202/301/703) ╞═╕"
  354. MESS"               │                                                │"
  355. MESS"               │       -Board-                      -SIG-       │"
  356. MESS"               │                                                │"
  357. MESS"               │  < 1> Net-Exchange                 PC Pursuit  │"
  358. MESS"               │  < 2> Interconnect                Jeff Morley  │"
  359. MESS"               │  < 3> DARWIN              Home of DARWIN list  │"
  360. MESS"               │  < 4> Capitol Connection           Everything  │"
  361. MESS"               │  < 5> Gannett Help Screen          Publishing  │"
  362. MESS"               │  < 6> ITC                                      │"
  363. MESS"               │  < 7> Data Gate                                │"
  364. MESS"               │  < 8> National Geographic                      │"
  365. MESS"               │  < 9> Geobyte                                  │"
  366. MESS"               │  <10>                                          │"
  367. MESS"               │                                                │"
  368. MESS"               │          <G>o back to city selection           │"
  369. MESS"               │                                                │"
  370. MESS"               ├────────────────────────────────────────────────┤"
  371. MESS"               │  Enter 1-10 or other BBS phone number:         │"
  372. MESS"               ╘════════════════════════════════════════════════╛"
  373. LOCA 20,56
  374. GET S9 7
  375. SWIT S9
  376. CASE"1"
  377. ASSI S2"6893561"
  378. ;ASSI S7"COMMAND.VER"
  379. ENDC
  380. CASE"2"
  381. ASSI S2"8275762"
  382. ;ASSI S7"COMMAND.VER"
  383. ENDC
  384. CASE"3"
  385. ASSI S2"2519206"
  386. ;ASSI S7"COMMAND.VER"
  387. ENDC
  388. CASE"4"
  389. ASSI S2"2805490"
  390. ;ASSI S7"COMMAND.VER"
  391. ENDC
  392. CASE"5"
  393. ASSI S2"5243982"
  394. ;ASSI S7"COMMAND.VER"
  395. ENDC
  396. CASE"6"
  397. ASSI S2"2751010"
  398. ;ASSI S7"COMMAND.VER"
  399. ENDC
  400. CASE"7"
  401. ASSI S2"9488332"
  402. ;ASSI S7"COMMAND.VER"
  403. ENDC
  404. CASE"8"
  405. ASSI S2"7756738"
  406. ;ASSI S7"COMMAND.VER"
  407. ENDC
  408. CASE"9"
  409. ASSI S2"5935946"
  410. ;ASSI S7"COMMAND.VER"
  411. ENDC
  412. CASE"10"
  413. ASSI S2"XXXXXXX"
  414. ;ASSI S7"COMMAND.VER"
  415. ENDC
  416. CASE"D"
  417. EXEC"VERSA.CMD"
  418. ENDC
  419. CASE"E"
  420. EXEC"VERSA.CMD"
  421. ENDC
  422. CASE"G"
  423. EXEC"VERSA.CMD"
  424. ENDC
  425. DEFA
  426. ASSI S2 S9
  427. ENDC
  428. ENDS
  429. ASSI S9"ACTIVE"
  430. EXEC"VERSA.CMD"
  431. CHICAGO:
  432. CLEA
  433. LOCA 2,0
  434. MESS"               ╒════════╡ Chicago BBS Directory  (312) ╞════════╕"
  435. MESS"               │                                                │"
  436. MESS"               │       -Board-                      -SIG-       │"
  437. MESS"               │                                                │"
  438. MESS"               │  < 1> Super Board         Files, Files, Files  │"
  439. MESS"               │  < 2> Lakes Region RBBS                        │"
  440. MESS"               │  < 3> RIPCOoard                Pseudo Illegal  │"
  441. MESS"               │  < 4> LAWMUG                     Law, Lawyers  │"
  442. MESS"               │  < 5> Chicago Computer Society                 │"
  443. MESS"               │  < 6> Ski's Lodge                              │"
  444. MESS"               │  < 7> Excellence                               │"
  445. MESS"               │  < 8> Waukegan Pub Lib Sys                     │"
  446. MESS"               │  < 9> Windmill                                 │"
  447. MESS"               │  <10>                                          │"
  448. MESS"               │                                                │"
  449. MESS"               │          <G>o back to city selection           │"
  450. MESS"               │                                                │"
  451. MESS"               ├────────────────────────────────────────────────┤"
  452. MESS"               │  Enter 1-10 or other BBS phone number:         │"
  453. MESS"               ╘════════════════════════════════════════════════╛"
  454. LOCA 20,56
  455. GET S9 7
  456. SWIT S9
  457. CASE"1"
  458. ASSI S2"8824227"
  459. ;ASSI S7"COMMAND.VER"
  460. ENDC
  461. CASE"2"
  462. ASSI S2"8728086"
  463. ;ASSI S7"COMMAND.VER"
  464. ENDC
  465. CASE"3"
  466. ASSI S2"5285020"
  467. ;ASSI S7"COMMAND.VER"
  468. ENDC
  469. CASE"4"
  470. ASSI S2"2808180"
  471. ;ASSI S7"COMMAND.VER"
  472. ENDC
  473. CASE"5"
  474. ASSI S2"9406496"
  475. ;ASSI S7"COMMAND.VER"
  476. ENDC
  477. CASE"6"
  478. ASSI S2"2829272"
  479. ;ASSI S7"COMMAND.VER"
  480. ENDC
  481. CASE"7"
  482. ASSI S2"3982872"
  483. ;ASSI S7"COMMAND.VER"
  484. ENDC
  485. CASE"8"
  486. ASSI S2"6232226"
  487. ;ASSI S7"COMMAND.VER"
  488. ENDC
  489. CASE"9"
  490. ASSI S2"8798027"
  491. ;ASSI S7"COMMAND.VER"
  492. ENDC
  493. CASE"10"
  494. ASSI S2"XXXXXXX"
  495. ;ASSI S7"COMMAND.VER"
  496. ENDC
  497. CASE"D"
  498. EXEC"VERSA.CMD"
  499. ENDC
  500. CASE"E"
  501. EXEC"VERSA.CMD"
  502. ENDC
  503. CASE"G"
  504. EXEC"VERSA.CMD"
  505. ENDC
  506. DEFA
  507. ASSI S2 S9
  508. ENDC
  509. ENDS
  510. ASSI S9"ACTIVE"
  511. EXEC"VERSA.CMD"
  512.